home *** CD-ROM | disk | FTP | other *** search
/ ClipArt Heaven 2 / ClipArt Heaven 2.iso / utility / datashow / promote2.shw < prev    next >
Text File  |  1992-08-31  |  5KB  |  205 lines

  1. ;*********************************************************************;
  2. ; Sciptname..:  PROMOTE2.SHW                                          ;
  3. ; Date.......:  1st. Sep. 1992, by RMP DATA.                          ;
  4. ; Purpose....:  Promotion for VIDEOSYS v. 2.0A, as an example script. ;
  5. ;*********************************************************************;
  6.  
  7. ; A fully text based demo for DataShow v. 3.0A
  8.  
  9. ; Other files involved:
  10. ; video1.scr - video11.scr
  11.  
  12. COLOR FOREGROUND 15
  13. COLOR BACKGROUND 1
  14. COLOR ATTRIBUTE 31
  15. SET DELAYFACTOR 5
  16. SET TIMEOUT 8
  17.  
  18. SET CURSOR OFF
  19.  
  20. DEFINE
  21. ///////   ///  ///  ///////     ///////    //////   ///////   //////
  22. //    //  // // //  //    //    //    //  //    //    //     //    //
  23. ////////  // // //  ///////     //    //  ////////    //     ////////
  24. //  //    // // //  //          //    //  //    //    //     //    //
  25. //   //   //    //  //          ///////   //    //    //     //    //
  26. ENDDEFINE
  27.  
  28. CLEARSCREEN
  29.  
  30. GOXY 1 10
  31.  
  32. MOTION RIGHT 74
  33.  
  34. VARIABLE CREATE loop TYPE NUMBER 1
  35.  
  36. MARK 1
  37.  
  38. EFFECT SCROLL UP
  39.  
  40. VARIABLE INCREASE loop 1
  41. IF loop 8 DO JUMPMARK 2
  42. JUMPMARK 1
  43.  
  44. MARK 2
  45.  
  46. VARIABLE RELEASE loop
  47.  
  48. SET CURSOR ON
  49.  
  50. GOXY 10 12
  51. WRITE "Welcome to a presentation of a VIDEO SYSTEM..."
  52. WAIT 1
  53.  
  54. SET CURSOR OFF
  55.  
  56. SPEAK "V-EE-D-I-AW"
  57. WAIT 1
  58. SPEAK "S-Y-S-T-EH-M"
  59. WAIT 2
  60.  
  61. SHOWSCREEN "video1.scr" TXT
  62. WAIT 4
  63.  
  64. SET CURSOR ON
  65.  
  66. CLEARSCREEN
  67. GOXY 10 4
  68. WRITE "The program is especially developed for administration"
  69. GOXY 10 6
  70. WRITE "in video rental stores.  Here it is possible easily to"
  71. GOXY 10 8
  72. WRITE "get a long range of information about customers video"
  73. GOXY 10 10
  74. WRITE "habits, as well as make it easy to rent out and get back"
  75. GOXY 10 12
  76. WRITE "videos. The VIDEO SYSTEM also makes it possible for you"
  77. GOXY 10 14
  78. WRITE "to export information for further processing elsewhere."
  79. GOXY 10 18
  80. WAIT "Push any key"
  81.  
  82. SET CURSOR OFF
  83.  
  84. EFFECT GLITTER
  85.  
  86. SHOWSCREEN "video2.scr" TXT
  87. WAIT 4
  88.  
  89. CLEARSCREEN
  90. GOXY 10 4
  91. WRITE "Here we'll go through a few of the many possibilities"
  92. GOXY 10 6
  93. WRITE "that's available in VIDEO SYSTEM. First let's see what's"
  94. GOXY 10 8
  95. WRITE "available under the video menu. Here a video is beeing"
  96. GOXY 10 10
  97. WRITE "changed."
  98. WAIT 4
  99.  
  100. SHOWSCREEN "video3.scr" TXT
  101. WAIT 4
  102.  
  103. SHOWSCREEN "video4.scr" TXT
  104. WAIT 2
  105.  
  106. GOXY 32 8
  107. WRITE "Live an let die"
  108. WAIT 4
  109.  
  110. CLEARSCREEN
  111. GOXY 10 8
  112. WRITE "To each video a price code is assigned. The price can then"
  113. GOXY 10 10
  114. WRITE "be changed very fast, and it is possible to take rebates"
  115. GOXY 10 12
  116. WRITE "into account. Here the price setup is shown."
  117. WAIT 4
  118.  
  119. SHOWSCREEN "video5.scr" TXT
  120. WAIT 4
  121.  
  122. EFFECT GLITTER
  123.  
  124. CLEARSCREEN
  125. GOXY 10 8
  126. WRITE "Messages can be written on price tags. Such messages can"
  127. GOXY 10 10
  128. WRITE "be changed from day to day, hour to hour. The message"
  129. GOXY 10 12
  130. WRITE "writing can be done under the menu 'diverse'."
  131. WAIT 4
  132.  
  133. SHOWSCREEN "video6.scr" TXT
  134. WAIT 4
  135.  
  136. SHOWSCREEN "video7.scr" TXT
  137. WAIT 4
  138.  
  139. CLEARSCREEN
  140. GOXY 10 8
  141. WRITE "It's very easy to rent a video to a customer. And all the"
  142. GOXY 10 10
  143. WRITE "information is shown in detail on the screen. - After all"
  144. GOXY 10 12
  145. WRITE "the information  has been entered,  a detailed price slip"
  146. GOXY 10 14
  147. WRITE "will be printed on a connected printer."
  148. WAIT 4
  149.  
  150. SHOWSCREEN "video8.scr" TXT
  151. WAIT 4
  152.  
  153. SHOWSCREEN "video9.scr" TXT
  154. WAIT 4
  155.  
  156. CLEARSCREEN
  157. GOXY 10 8
  158. WRITE "When videos are rented out, it is possible (if you know the"
  159. GOXY 10 10
  160. WRITE "password) to get information about todays sales."
  161. WAIT 4
  162.  
  163. SHOWSCREEN "video10.scr" TXT
  164. WAIT 4
  165.  
  166. CLEARSCREEN
  167. GOXY 10 8
  168. WRITE "At last, we show you an example of the many features that"
  169. GOXY 10 10
  170. WRITE "are availbale through the VIDEO SYSTEM. E.g. it is a possi-"
  171. GOXY 10 12
  172. WRITE "bility to have labels over customers written. You can then"
  173. GOXY 10 14
  174. WRITE "mail out special offers."
  175. WAIT 3
  176.  
  177. SHOWSCREEN "video11.scr" TXT
  178. WAIT 4
  179.  
  180. CLEARSCREEN
  181. GOXY 10 2
  182. WRITE "With the VIDEO program there's also (of course) an easily"
  183. GOXY 10 4
  184. WRITE "read MANUAL with detailed explanations."
  185. GOXY 10 8
  186. WRITE "Unfortunately the VIDEO SYSTEM is only available in Danish"
  187. GOXY 10 10
  188. WRITE "at the moment. But interested parties can contact RMP DATA"
  189. GOXY 10 12
  190. WRITE "at the address shown in the READ.ME file for more information."
  191. GOXY 10 16
  192. WRITE "Now this presentation starts over again. But you can stop"
  193. GOXY 10 18
  194. WRITE "it at any time by pressing the escape key. You can then"
  195. GOXY 10 20
  196. WRITE "order a demonstration diskette of the VIDEO SYSTEM. With"
  197. GOXY 10 22
  198. WRITE "the demonstration version you can enter 10 customers and 10"
  199. GOXY 10 24
  200. WRITE "video' so you can get an idea of the system. Have a nice Day!"
  201. SET CURSOR ON
  202. WAIT 8
  203.  
  204. CONTINUE
  205.